home *** CD-ROM | disk | FTP | other *** search
/ Geek Games #12 / GEGA012.iso / Jogos de Azar / 662.swf / scripts / frame_17 / DoAction.as
Text File  |  2006-01-17  |  1KB  |  71 lines
  1. if(split == 1)
  2. {
  3.    if(player_grad[1] == 0)
  4.    {
  5.       num = 13;
  6.       add_card = 1;
  7.       run_split = 0;
  8.       player_card[0] = add_card;
  9.       player_grad[0] = player_grade;
  10.       player_grad[1] = result[11] % 13;
  11.       need = 1;
  12.       gotoAndPlay(10);
  13.    }
  14.    else
  15.    {
  16.       computer_grade = calc_grade(2,result,10);
  17.       if(add_card == 5)
  18.       {
  19.          add_card = 2;
  20.       }
  21.       if(computer_grade < 17 && add_card < 5)
  22.       {
  23.          need = 2;
  24.          if(first_tf == 1)
  25.          {
  26.             first_tf = 0;
  27.             num = 6;
  28.             add_card = 2;
  29.          }
  30.          else
  31.          {
  32.             num += 1;
  33.          }
  34.          gotoAndPlay(10);
  35.       }
  36.       else
  37.       {
  38.          computer_card = add_card;
  39.          gotoAndPlay(18);
  40.       }
  41.    }
  42. }
  43. else
  44. {
  45.    computer_grade = calc_grade(2,result,10);
  46.    if(add_card == 5)
  47.    {
  48.       add_card = 2;
  49.    }
  50.    if(computer_grade < 17 && add_card < 5)
  51.    {
  52.       need = 2;
  53.       if(first_tf == 1)
  54.       {
  55.          first_tf = 0;
  56.          num = 6;
  57.          add_card = 2;
  58.       }
  59.       else
  60.       {
  61.          num += 1;
  62.       }
  63.       gotoAndPlay(10);
  64.    }
  65.    else
  66.    {
  67.       computer_card = add_card;
  68.       gotoAndPlay(18);
  69.    }
  70. }
  71.